function ciotio

global imode lmode

lmode = imode;

if (imode >= 2)

    imode = imode - 2;

end
